'##############################
'Форточки и потолочные люки - скрипт
'##############################
'
' Для ЛиАЗ 5256.26
' =============================
' История файла:
' Яковлев Вячеслав	30.04.2011	Создание файла
' Яковлев Вячеслав	30.04.2011	Добавление стандартного блока форточки водителя
' Яковлев Вячеслав	01.05.2011 	Добавлены блоки форточек салона
' Яковлев Вячеслав	01.05.2011 	Добавлены блоки люков салона
' Яковлев Вячеслав	20.07.2011 	Изменен блок форточки водителя и добавлен блок форточки перегородки
' Яковлев Вячеслав	31.12.2011-01.01.2012
'								Изменен скрипт открытия потолочных люков- теперь они принимают 3 положения
' =============================
'
'===== Форточка водителя =====

{trigger:cp_fort_vod_opn_drag}

	(L.L.cp_fort_vod_pos) (S.L.cp_fort_vod_lastpos)

	(L.S.mouse_x) -500 / (L.L.cp_fort_vod_pos) + (S.L.cp_fort_vod_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_vod_pos)
		(L.L.cp_fort_vod_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_vod_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_vod_pos)
		(L.L.cp_fort_vod_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_vod_endanschlag)
	{endif}

	(L.L.cp_fort_vod_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_vod_endanschlag)
	{endif}


	(L.L.cp_fort_vod_pos) (L.L.cp_fort_vod_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_vod_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== Форточка перегородки =====

{trigger:cp_fort_pereg_opn_drag}

	(L.L.cp_fort_pereg_pos) (S.L.cp_fort_pereg_lastpos)

	(L.S.mouse_x) 500 / (L.L.cp_fort_pereg_pos) + (S.L.cp_fort_pereg_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_pereg_pos)
		(L.L.cp_fort_pereg_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_pereg_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_pereg_pos)
		(L.L.cp_fort_pereg_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_pereg_endanschlag)
	{endif}

	(L.L.cp_fort_pereg_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_pereg_endanschlag)
	{endif}


	(L.L.cp_fort_pereg_pos) (L.L.cp_fort_pereg_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_pereg_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== 1-я правая салонная форточка ======

{trigger:cp_fort_R1_opn_drag}

	(L.L.cp_fort_R1_pos) (S.L.cp_fort_R1_lastpos)

	(L.S.mouse_x) -500 / (L.L.cp_fort_R1_pos) + (S.L.cp_fort_R1_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_R1_pos)
		(L.L.cp_fort_R1_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_R1_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_R1_pos)
		(L.L.cp_fort_R1_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_R1_endanschlag)
	{endif}

	(L.L.cp_fort_R1_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_R1_endanschlag)
	{endif}


	(L.L.cp_fort_R1_pos) (L.L.cp_fort_R1_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_R1_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== 2-я правая салонная форточка ======

{trigger:cp_fort_R2_opn_drag}

	(L.L.cp_fort_R2_pos) (S.L.cp_fort_R2_lastpos)

	(L.S.mouse_x) -500 / (L.L.cp_fort_R2_pos) + (S.L.cp_fort_R2_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_R2_pos)
		(L.L.cp_fort_R2_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_R2_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_R2_pos)
		(L.L.cp_fort_R2_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_R2_endanschlag)
	{endif}

	(L.L.cp_fort_R2_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_R2_endanschlag)
	{endif}


	(L.L.cp_fort_R2_pos) (L.L.cp_fort_R2_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_R2_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== 3-я правая салонная форточка ======

{trigger:cp_fort_R3_opn_drag}

	(L.L.cp_fort_R3_pos) (S.L.cp_fort_R3_lastpos)

	(L.S.mouse_x) -500 / (L.L.cp_fort_R3_pos) + (S.L.cp_fort_R3_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_R3_pos)
		(L.L.cp_fort_R3_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_R3_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_R3_pos)
		(L.L.cp_fort_R3_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_R3_endanschlag)
	{endif}

	(L.L.cp_fort_R3_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_R3_endanschlag)
	{endif}


	(L.L.cp_fort_R3_pos) (L.L.cp_fort_R3_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_R3_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== 1-я левая салонная форточка ======

{trigger:cp_fort_L1_opn_drag}

	(L.L.cp_fort_L1_pos) (S.L.cp_fort_L1_lastpos)

	(L.S.mouse_x) 500 / (L.L.cp_fort_L1_pos) + (S.L.cp_fort_L1_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_L1_pos)
		(L.L.cp_fort_L1_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_L1_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_L1_pos)
		(L.L.cp_fort_L1_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_L1_endanschlag)
	{endif}

	(L.L.cp_fort_L1_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_L1_endanschlag)
	{endif}


	(L.L.cp_fort_L1_pos) (L.L.cp_fort_L1_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_L1_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}


'===== 2-я левая салонная форточка ======

{trigger:cp_fort_L2_opn_drag}

	(L.L.cp_fort_L2_pos) (S.L.cp_fort_L2_lastpos)

	(L.S.mouse_x) 500 / (L.L.cp_fort_L2_pos) + (S.L.cp_fort_L2_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_L2_pos)
		(L.L.cp_fort_L2_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_L2_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_L2_pos)
		(L.L.cp_fort_L2_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_L2_endanschlag)
	{endif}

	(L.L.cp_fort_L2_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_L2_endanschlag)
	{endif}


	(L.L.cp_fort_L2_pos) (L.L.cp_fort_L2_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_L2_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}


'===== 3-я левая салонная форточка ======

{trigger:cp_fort_L3_opn_drag}

	(L.L.cp_fort_L3_pos) (S.L.cp_fort_L3_lastpos)

	(L.S.mouse_x) 500 / (L.L.cp_fort_L3_pos) + (S.L.cp_fort_L3_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_L3_pos)
		(L.L.cp_fort_L3_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_L3_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_L3_pos)
		(L.L.cp_fort_L3_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_L3_endanschlag)
	{endif}

	(L.L.cp_fort_L3_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_L3_endanschlag)
	{endif}


	(L.L.cp_fort_L3_pos) (L.L.cp_fort_L3_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_L3_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== 4-я левая салонная форточка ======

{trigger:cp_fort_L4_opn_drag}

	(L.L.cp_fort_L4_pos) (S.L.cp_fort_L4_lastpos)

	(L.S.mouse_x) 500 / (L.L.cp_fort_L4_pos) + (S.L.cp_fort_L4_pos) s0
	l0 0 <
	{if}
		0 (S.L.cp_fort_L4_pos)
		(L.L.cp_fort_L4_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.cp_fort_L4_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.cp_fort_L4_pos)
		(L.L.cp_fort_L4_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.cp_fort_L4_endanschlag)
	{endif}

	(L.L.cp_fort_L4_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.cp_fort_L4_endanschlag)
	{endif}


	(L.L.cp_fort_L4_pos) (L.L.cp_fort_L4_lastpos) - abs (L.S.Timegap) / (S.L.cp_fahrerfenster_speed)
{end}


{trigger:cp_fort_L4_opn_off}
	0 (S.L.cp_fahrerfenster_speed)
{end}

'===== 1-ый потолочный люк ======

{trigger:luk_1}
	(L.L.cp_luk_1) !
	(L.L.cp_luk_1_rot) ! &&
	(L.L.cp_luk_1_trans) ! &&
	{if}
		1 (S.L.cp_luk_1)
		(T.L.ev_klappfenster_opn)
	{else}
		(L.L.cp_luk_1)
		{if}
			1 (S.L.cp_luk_1_rot)
			0 (S.L.cp_luk_1)
			(T.L.ev_klappfenster_opn)
		{else}
			(L.L.cp_luk_1_rot)
			{if}
				1 (S.L.cp_luk_1_trans)
				0 (S.L.cp_luk_1) (S.L.cp_luk_1_rot)
				(T.L.ev_klappfenster_opn)
			{else}
				0 (S.L.cp_luk_1_trans) (S.L.cp_luk_1) (S.L.cp_luk_1_rot)
				(T.L.ev_klappfenster_cls)
			{endif}
		{endif}
	{endif}
{end}


' Макрос звука люков
{macro:klappfenstersound}
	l1
	{if}
		(T.L.ev_klappfenster_opn)
	{else}
		(T.L.ev_klappfenster_cls)
	{endif}	
{end}